-- card: 2942 from stack: in.1
-- bmap block id: 2277
-- flags: 4000
-- background id: 2810
-- name: Function Card
----- HyperTalk script -----
on openCard
  global cardname
  global menuhid
  put 0 into menuhid
  show menubar
  hide message box
  put cardname into card field 1
end openCard

on closeCard
  global menuhid
  put 1 into menuhid
  hide menubar
  hide message box
end closeCard


-- part 7 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=14 top=29 right=66 bottom=58
-- title width / last selected line: 0
-- icon id / first selected line: 20098 / 20098
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Go Home
----- HyperTalk script -----
on mouseUp
  show menubar
  hide message box
  visual effect iris close
  go Home
end mouseUp



-- part 8 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=12 top=76 right=114 bottom=59
-- title width / last selected line: 0
-- icon id / first selected line: 32670 / 32670
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Show All Cards
----- HyperTalk script -----
on mouseUp
  hide menubar
  get the number of last card
  put it into nextolast
  subtract 1 from nextolast
  put 1 into it
  repeat until it is nextolast or the mouseClick
    visual effect dissolve
    go to next card
    get the number of this card
    wait 2 seconds
  end repeat
  visual effect dissolve
  go to first card
end mouseUp



-- part 12 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=79 top=76 right=115 bottom=120
-- title width / last selected line: 0
-- icon id / first selected line: 29114 / 29114
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Return
----- HyperTalk script -----
on mouseUp
  hide menubar
  visual effect iris close
  pop card
end mouseUp



-- part 16 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=80 top=30 right=66 bottom=121
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Card
----- HyperTalk script -----
on mouseUp
  set lockScreen to true
  visual effect iris open
  pop card
  doMenu "New Card"
  ask "Name of the New Card:"
  set the name of this card to it
  set lockScreen to false
  choose browse tool
  show menubar
end mouseUp



-- part 18 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=121 top=93 right=112 bottom=322
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: card name


-- part 19 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=153 top=30 right=66 bottom=194
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Find Card
----- HyperTalk script -----
on mouseUp
  ask "Find Which Card?"
  put it into findcard
  set the cursor to 4  -- watch cursor
  put false into found
  get the number of last card
  put it into nextolast
  subtract 1 from nextolast
  -- 1 minus the last card is the next to last card
  repeat until found or it is nextolast
    visual effect dissolve
    go to next card
    get the name of this card
    put offset(findcard, it) into match
    -- 'card "' (7 characters) is in front of the name of the card
    if match >= 7 then put true into found
    get the number of this card
  end repeat
  if not found then
    visual effect dissolve
    go to first card
  end if
  choose browse tool
end mouseUp



-- part 20 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=222 top=31 right=67 bottom=263
-- title width / last selected line: 0
-- icon id / first selected line: 14767 / 14767
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 
----- HyperTalk script -----
on mouseUp
  visual effect dissolve
  go to last card
end mouseUp



-- part contents for card part 18
----- text -----
previous stack